﻿Public Class PinDTO
    Protected ma_pin As Integer
    Protected ten_pin As String
    Protected ma_loai As Integer
    Protected cong_suat As Integer
    Protected kich_thuoc As String
    Protected hang_sx As String
    Protected imp_ts As Integer
    Protected imp_min As Integer
    Protected imp_max As Integer
    Protected vmp_ts As Integer
    Protected vmp_min As Integer
    Protected vmp_max As Integer
    Protected isc_ts As Integer
    Protected isc_min As Integer
    Protected isc_max As Integer
    Protected voc_ts As Integer
    Protected voc_min As Integer
    Protected voc_max As Integer
    Public Property MaPin() As Integer
        Get
            Return ma_pin
        End Get
        Set(ByVal value As Integer)
            ma_pin = value
        End Set
    End Property
    Public Property TenPin() As String
        Get
            Return ten_pin
        End Get
        Set(ByVal value As String)
            ten_pin = value
        End Set
    End Property
    Public Property MaLoai() As Integer
        Get
            Return ma_loai
        End Get
        Set(ByVal value As Integer)
            ma_loai = value
        End Set
    End Property
    Public Property CongSuat() As Integer
        Get
            Return cong_suat
        End Get
        Set(ByVal value As Integer)
            cong_suat = value
        End Set
    End Property
    Public Property KichThuoc() As String
        Get
            Return kich_thuoc
        End Get
        Set(ByVal value As String)
            kich_thuoc = value
        End Set
    End Property
    Public Property HangSanXuat() As String
        Get
            Return hang_sx
        End Get
        Set(ByVal value As String)
            hang_sx = value
        End Set
    End Property
    Public Property Imp() As Integer
        Get
            Return imp_ts
        End Get
        Set(ByVal value As Integer)
            imp_ts = value
        End Set
    End Property
    Public Property ImpMin() As Integer
        Get
            Return imp_min
        End Get
        Set(ByVal value As Integer)
            imp_min = value
        End Set
    End Property
    Public Property ImpMax() As Integer
        Get
            Return imp_max
        End Get
        Set(ByVal value As Integer)
            imp_max = value
        End Set
    End Property
    Public Property Vmp() As Integer
        Get
            Return vmp_ts
        End Get
        Set(ByVal value As Integer)
            vmp_ts = value
        End Set
    End Property
    Public Property VmpMin() As Integer
        Get
            Return vmp_min
        End Get
        Set(ByVal value As Integer)
            vmp_min = value
        End Set
    End Property
    Public Property VmpMax() As Integer
        Get
            Return vmp_max
        End Get
        Set(ByVal value As Integer)
            vmp_max = value
        End Set
    End Property
    Public Property Isc() As Integer
        Get
            Return isc_ts
        End Get
        Set(ByVal value As Integer)
            isc_ts = value
        End Set
    End Property
    Public Property IscMin() As Integer
        Get
            Return isc_min
        End Get
        Set(ByVal value As Integer)
            isc_min = value
        End Set
    End Property
    Public Property IscMax() As Integer
        Get
            Return isc_max
        End Get
        Set(ByVal value As Integer)
            isc_max = value
        End Set
    End Property
    Public Property Voc() As Integer
        Get
            Return voc_ts
        End Get
        Set(ByVal value As Integer)
            voc_ts = value
        End Set
    End Property
    Public Property VocMin() As Integer
        Get
            Return voc_min
        End Get
        Set(ByVal value As Integer)
            voc_min = value
        End Set
    End Property
    Public Property VocMax() As Integer
        Get
            Return voc_max
        End Get
        Set(ByVal value As Integer)
            voc_max = value
        End Set
    End Property
    Public Sub New()
        TenPin = ""
        MaLoai = 0
        CongSuat = 0
        KichThuoc = ""
        HangSanXuat = ""
        Imp = 0
        Vmp = 0
        Isc = 0
        Voc = 0
    End Sub

    Public Sub New(ByVal tenpin As String)
        Me.TenPin = tenpin
    End Sub
    Public Sub New(ByVal tenpin As String, ByVal maloai As Integer, ByVal congsuat As Integer, ByVal kichthuoc As String, ByVal hangsx As String, ByVal imp As Integer, ByVal vmp As Integer, ByVal isc As Integer, ByVal voc As Integer)
        Me.TenPin = tenpin
        Me.MaLoai = maloai
        Me.CongSuat = congsuat
        Me.KichThuoc = kichthuoc
        Me.HangSanXuat = hangsx
        Me.Imp = imp
        Me.Vmp = vmp
        Me.Isc = isc
        Me.Voc = voc
    End Sub
    Public Sub New(ByVal mapin As Integer, ByVal tenpin As String, ByVal maloai As Integer, ByVal congsuat As Integer, ByVal kichthuoc As String, ByVal hangsx As String, ByVal imp As Integer, ByVal vmp As Integer, ByVal isc As Integer, ByVal voc As Integer)
        Me.MaPin = mapin
        Me.TenPin = tenpin
        Me.MaLoai = maloai
        Me.CongSuat = congsuat
        Me.KichThuoc = kichthuoc
        Me.HangSanXuat = hangsx
        Me.Imp = imp
        Me.Vmp = vmp
        Me.Isc = isc
        Me.Voc = voc
    End Sub
    Public Sub New(ByVal mapin As Integer, ByVal tenpin As String, ByVal maloai As Integer, ByVal congsuat As Integer, ByVal kichthuoc As String, ByVal hangsx As String, ByVal impmin As Integer, ByVal impmax As Integer, ByVal vmpmin As Integer, ByVal vmpmax As Integer, ByVal iscmin As Integer, ByVal iscmax As Integer, ByVal vocmin As Integer, ByVal vocmax As Integer)
        Me.MaPin = mapin
        Me.TenPin = tenpin
        Me.MaLoai = maloai
        Me.CongSuat = congsuat
        Me.KichThuoc = kichthuoc
        Me.HangSanXuat = hangsx
        Me.ImpMin = impmin
        Me.ImpMax = impmax
        Me.VmpMin = vmpmin
        Me.VmpMax = vmpmax
        Me.IscMin = iscmin
        Me.IscMax = iscmax
        Me.VocMin = vocmin
        Me.VocMax = vocmax
    End Sub
End Class

